home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Readers / 3utils / PCP / PCPGUI < prev    next >
Text File  |  1997-09-03  |  547b  |  19 lines
  1. ;$VER: PCPGui Version 1.00 R.Ruck (1/9/97)
  2.  
  3. requestfile TITLE="Source File.." NOICONS >env:infile.pcp
  4. requestfile TITLE="Destination File.." NOICONS >env:outfile.pcp
  5. requestchoice TITLE="PCP V1.00 Request" "Encrypt or Decrypt ?" Encrypt Decrypt >env:method.pcp
  6. requestfile TITLE="Password Please.." NOICONS Pattern=~#? >env:password.pcp
  7.  
  8. IF "{method.pcp}" EQ "1"
  9. echo "oh yes"
  10.  ;pcp e $infile.pcp $outfile.pcp $password.pcp
  11. ENDIF
  12.  
  13. IF "{method.pcp}" EQ "0"
  14. echo "oh no"
  15.  ;pcp d $infile.pcp $outfile.pcp $password.pcp
  16. ENDIF
  17.  
  18. delete env:#?.pcp >NIL:
  19.